home *** CD-ROM | disk | FTP | other *** search
/ Interplay's Learn to Program Basic (Review Copy) / Learn to Program Basic Review Copy (Interplay)(June 23, 1998).ISO / pc / ltpbasic / refxmpl / goto.bas < prev    next >
Encoding:
BASIC Source File  |  1998-04-07  |  136 b   |  8 lines
  1. CLS
  2. PrintIt:
  3. Print "Enter a number from 1 to 10 ";
  4. Input num
  5. If num < 1 OR num > 10 Then Goto PrintIt
  6. Print "Thank you. That is all."
  7.